﻿
Partial Class Short_Answer
    Inherits System.Web.UI.Page

    Protected Sub btnSubmit_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSubmit.Click
        Dim Iquestion As New UserManagement
        Iquestion.InsertQuestion(Me.txtTitle.Text, Me.QuestionEditor.Content, Session("User"), Me.FeedbackEditor.Content, Me.txtAnswer.Text)

        Response.Redirect("Default2.aspx")
    End Sub
End Class
